#
# impburg.r
# Imputation of Burgoon dataset, JCR 2006.
# jH, 23/2/10
#

library("Amelia")

x<-load("burgoonsubset.RData")

many.output<-amelia(reasonabledata,m=100,cs="cow",ts="year",intercs=TRUE,polytime=3,incheck=FALSE,p2s=2,tolerance=0.0005,outname="p3ny",empri=0.1,emburn=c(0,75))
